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“IDENT Pvo4=000"" ormat one Line 


—PARARRARAAAARARAALALAASALALALE LAR E SALE REE RAE RR RRR EERE ERE RRR ESR RESET ERR EEE SY 


COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


SOFTWARE IS FURNI 
N ACCORDANCE Wi 


THIS SHED_UNDER A LICENSE AND MAY BE USED AND COPIED 
ONLY N TH TERM 

INCLUSION OF THE ABO 
COPIE 

OTHE 


® ® 
x oa 
® ® 
7 ® 
* ® 
® ® 
* OF SUCH LICENSE AND WITH THE ®* 
‘ COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * 
* S THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
* R PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
* TRANSFERRED. “ 
® a 
* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
* CORPORATION. » 
® & 
ca i 
* 
& ca 
& * 
e * 


DIGITAL ASSUMES NO RESPONS . 


IBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH L 


L 
S$ NOT SUPPLIED BY DIGITAL. 


REHEAT AAAAAAAARAAAAAAAAAAAAAAAARERAAAAARAAAAAAAAAAREE 
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p++ 
3 FACILITY: 
3 File dump utility. 
> ABSTRACT: 
3 This module contains the routine to format one Line. 
> ENVIRONMENT: 
: VAX native, user mode. 
: AUTHOR: Benn Schreiber, Stephen Zalewski CREATION DATE: 22-Jun-1981 
6 > MODIFIED BY: 
0 ; v02-001 MLJ0033 Martin L, Jack, 23-Aug-1981 9:48 
° 3 Minor cleanup to finish implementation. 
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yoa-000 SUMPSFAO_LINE, format one Line Bre eE 158s b0:s5.85 FDUMe SRcaounPyacrgemar:1 29° (3, 
9 -SBTTL DUMPSFAO_LINE, format one Line 
; : Format one Line of dump Listing 
2 Inputs: 
: 4(ap) = pointer to data to be dumped 
0 3 3 p (ap) = Ruaber of entries per ens 
8 3 (ap) = size of one entry 
§ 16(ap) = byte-offset value for side of Line 
60 ; (ap) = number of entries in buffer 
61 ; 4(ap) = 0: longword, 1: yord. 2: byte 
62 ; St ap} = address of descriptor for FAO control string 
° o7 : (ap) = address of descriptor for output buffer 
003C 65 ° -entr ump$fao_Line,*M<R2,R3,R4,R5> 
53 08 ag 7d 000 06 movqg , fen) re 3 RS = entries per Line, R4 = size of entry 
54 5 C4 000 6 mull2 3,74 3; compute number of bytes this Line 
10 AC DD 0009 68 pushl lelap) 3; push index to print on right hand side 
04 aC OD Bae 69 pushl 4(ap 3 push buffer address 
54 OD OO00F 70 pushl 4 3; push number of bytes 
52 114A DO 0011 71 movi 20(ap).r2 3 get number of entries in Line 
o8 AC 5 D1 0015 Le; capl rs (ap) 3; see if more than one Line's worth 
06 15 0019 7? bleq 108 : if leq no 
52 08 AC 00 0018 74 mov 8(ap).r2 3: yes, use max for one Line 
51 04 AC 00 OO1F 75 108: mov l 4(ap),ri 3 copy input data pointer 
5018 AC 20 99 3 id: mov 24(aps,r0 > get/test field width 
1 1 027 7 beql 40$ 3: 1f eql then longwords 
08 50 =C«éEB 3 ? ee blbs r0,30$ : branch if words 
09 ¢ 80 ; push bytes onto stack 
7E 81 9A ¢ 20$:  movzbl (r1)+,-(sp) : push one byte 
FA 52 =F5 60 F BS sobgtr #3 208 . ; fo them alt 
OD 11 8 t : brb 50$ ; go call fao 
0 r $ ; push words onto stack 
7E +? 6 O34 8 0S: movzwl (ri)+,-(sp) 3 push one word 
FA ¢ F ; 7 9 sobgtr 3 30$ 3; do them all 
0 «(11 A 30 brb 50$ : go call fao 
¢ 3 ; push Longwords onto stack 
81 Dp C 3 40s:  pusht = (r1)+ : push one Longword 
FB 52 «C«#F if ¢ ; sobgtr r2,40$ : do them all 
41 3 t call SFAO 
6E 9F 0041 38 S0$:  pushab (sp) ; push address of arg List 
20 AC OD 43 100 pushl 32(ap) 3: push output buffer descr. addr 
6— ODD rt 101 pushl (sp) ; also for output width 
1¢ AC OD 4 1 § pushl 2 (ap) -3 push fao control string addr 
00000000'°GF 04 fe : \ ? catls #4,g"sys$faol ; call sys$faol to format string 
re 
: 105 
106 -end | 
| 
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DUMPSF AO_LINE 00000000 RG 8 
eete x 1 


SYSS$F AOL teeree 
pore ro reese eee cae + 
! Psect synopsis ! 
Peet esemooenonaes + 
PSECT name Allocation PSECT No. Attributes 
. ABS $008 609 ( 9.3 69 ( 9. NOPIC USR CON ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYT 
SCODES 00000 . Saar eg -) NOPIC USR CON REL LCL NOSHR EXE RD NOWRT NOVEC B 
goeeeeeececoan Geos ses anmae + 
; Performance indicators ; 
Phase CPU Time 


Initialization 33 0:00: 0. 00:00:01.09 
Command processing 133 :00:00. Bo BR Re ote 
Pass % ++ 8°6 0:00: far 
arnatg TNS Gore 36 8:00:00:17 96100201 97 
Ss : $ e : : e 
Symbol table output 2 0:09: 3-8 0:00:00.00 
Psect synopsis output 1 00:00. 0:00:00.0 
Cross-reference output 9 8708: 0.0 Se Bt 
Assembler run totals 27 00:00:00.91 0:00:09.4 


Tne_working set Limit was 900 pages. 

1493 bytes (3 pages) of virtual memory were used to buffer the intermediate code. 

There were 10 pages of symbol table space allocated to hold 2 non-local and 5 local symbols. 
106 source Lines were read in Pass 1, producing 14 object records in Pass 2. 

0 pages of virtual memory were used to define 0 macros. 


Macro Library name 


-$255$DUA28: CSYSLIBISTARLET.MLB; 2 0 
0 GETS were required to define 0 macros. 


There were no errors, warnings or information messages. 
MACRO/LIS=L1S$:DUMPF AOLN/OBJ=0BJ$:DUMPFAOLN MSRC$:DUMPF AOLN/UPDATE=(ENHS: DUMPF AOLN) 
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